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U ABSTRACT; 

PPA IS I lOMODX THAT EXERCISES THE FPU HIGH AHO LOW DENSITY 
01 DRIVES. 

7. REOUIRViENTSl 

HARDWARES A PDPll INTERFACED IIITH A RPll* 
STORAGE:: RPA REQUIRES; 

L DECIMAL WOROSl 1237 

% OCTAL WORDS: 02325 

3. OCTAL BYTES? 4652 

3. PASS DFPIMITIO^J 

kn END OF PASS OCCURS I^HEI^ 788,000 KORDS HAVE BEEN TRANSFERED* 
FIRST A WRITE OF 1024 WORDS IS EXECUTED^ FOLLOWED BY A WRITE CHECK 
OF 1024 MORDS, THEN READING 256 WORDS FOLLOWED BY AN IN-CORE 
COMPARE. THIS IS OOf^E OPI ALL DRIVES THEM ALL TRACKS. 

4* EXECUTION TIME! 



AN END OF PASS TAKES APPROXIMATELY ONE MINUTE. 
5* CONFfGURATIQM REQUIRMENTSi 



DEFAULT PARAMETERS ARE AS FOLLOWS? 

DVA=176710 

VCT=254 

BR1=5 



Dli^irE/OPTTQN SETUP? 



MAKE SURE TWE DRIVE IS POWERED UP WITH WRITE ENABLED AUD 
THjiT THE DRIVE IS READY. ALSO BE SURE THAT THE PACK HAS 
PEEN FORMjlTTED PROPERLY. 
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SEQ §m3 



7. MODULE OPERATIONt 

EXECUTES A WRITEi. WRITE CHECK^ AND A READ ON ALL TRACKS^ ALL 
SECTO^^S,, AND ALL CVLIMOERS* 

A RETRY IS DOWE 3 TIMES BEFORE A MODULE IS DROPPED OR 
COHTI^'UES TO A I^SW PLOCK DEPEftlDINC 01^ THE SRI OPTION BITS. 
LOCATION "RTLMT" CAI^ BE CRAMCED TO ALTER THE NUMBER OF ATTEWTEO REfRYS« 

^* OPERATIWf: OPTIONS? 

SRI BITO=0->IF LO^ DENSITY 
SRI BIT0=1->IF HIGH DENSITY 

SPl PIT1=0->DROPS MODULE AFTER 3 UNRECOYERABLE ERRORS 

SRI BITi=l->GOES ON TO NEXT PLOCr AFTER AN UNRECOVSRAiLE ERROR 

SRI BIT2=0->V^ILL TYPEOUT DATA LATE ERRORS AND COUNTS tHE« IN LOCATION DLfCNT 

SRI BTT2 = l->\i^ILL NOT TYPEOUT DATE LATE ERRORS AND KEEPS COUNT OF THEM IN DLTCNT 

THERE IS A TABLE AT LOCATION "PADLOC" IN WHICH UP TO 20 CYLINDER-TRACK 

COMPINATIONS MAY RE ENTERED. FOR ANY CYL-TRK LISTED THERE NO ERRORS 

WILL RE REGISTERED* THIS IS INTENDED FOR USE MITH PACKS HITH KNOWN 

BAD SPOTS, REFER TO THE LISTING AT LOCATION BADLOC FOR DIRECTIONS 

ON HOM TO ENTER DISC ADDRESSES INTO THE TABLE. 

l^OTE; ANY ADDRESS ENTERED IN THIS TABLE ^ILL APPLY TO ALL DISKS 
UNDER TEST. 

9. NOM-STANDARD PRINTOOTSt 



ALL PRINTOUTS ARE STAK^OARD ACCORDING TO DEC/Kll DOCUMENTS. 
^RROR PRINTOUTS OTHER THAN DATA ERRORS AND NOT READY ERRORS 
DUMP THE REGISTERS IN THE FOLLOWING ORDERS 

DEYICE STATUS 

ERROR 

CONTROL STATUS 
MORD COUNT 
BUS ADDRESS 
CYLINDER ADDRESS 
DISK ADDRESS 

SELECTED UNIT CYLIfiDER ADDRESS 
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000000' 
000000' 



OOOOOu' 
00012' 240 



;XRP11 EXERCISER 

lOMODX <RPAM >176710^254#5^0,0#750., 
MODULE 150800,SPAM AlfW,2%4i%0j,.ux,,,t, 
.TITLE RPAM DEC/Xll SYSTEM EXERcfslRMODutE 




'?§9r.rf'INRDr 256.^ 1024. 



DDXCOM VERSION 6 



046501 



23-MAV-78" 



begin: 
modnam: 

XFUG; 
ADDR: 

Iectcr: 
BRl: 

SRI: 
SR2: 



.BYTE 

OPEN 
OPEN 
3PEN 



PRTYB 
PRTYO 



/ ,«ODDLE N.^Ij 

'M 



TO KEEP TRACK OF MBOfP OSAGE 
BR LEVEL. 



? SWITCH REGISTi 



SR4: OPEN 



?SHITCH 



STAT: 
A: 

PASCNT: 
ICONT: 
ICOUNT: 
SOFCNT 



MODSP 


~50. 




000116 




lEhuU mm ADOR. 

;MODOLE STACK POINTER. 
?PASS COUNTER. 



?» OF ITERATIONS PER PASS=750. 
JLQC TO COUNT ITERATIONS 
;LOC TO SAVE TOTAL SOFT ERRORS 



;ft OF SYS ERRORS ACCUMOLATED 

'iO^Lgi^NfiS!? OSiSnRAMg ^*CRO 1$ CALLED 
; RESERVED FOR MONITOR USE 
;RESERVED FOR MONITOR USE 
;RBSERVED FOR MONITOR USE 
>LOC TO SAVE RO. 
;L0C TO SAVE Rl. 
?LOC TO SAVE R2. 



|j.OC TO SAVE R3. 



;L0C TO SAVE R6. 

?AD0R OF CURRENT CSR. 
;ADDR OF GOOD DATA, OR 
fcONTENTS OF CSR. 
>ADDR OF BAD DATA, OR 
; STATUS REG CONTENTS. 
;TYPE of ERROR 

;bxpected data. 

FACTUAL DATA. 
; WORDS PROM MEMORY PER ITERAT 



ION 
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000 

0'- 
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000252- 
199 000252' 

m mm- 

"' iw- 

mm' 

000322' 

mW' 

000336' 
000340' 



m 
11 



012767 
005067 

mm 

001002 
104410 




>03256 

mm 

000000' 




mi 

7624 



000041 



-0006' 000124' 
77460 003142 
03136 



intr: 

ionum: 

R8UFVA: 
RBUFPA: 
RBUFEA: 
RBUFSZ: 
HBUFPA: 
WBUFEA: 

wbufrq: 

WBUFSZ: 
CDERCT: 
CDMDCT: 

free: 



MODSP: 
start: 



OPEN 
6 

inrd 

OPEN 
OPEN 
256. 
OPEN 
OPEN 

hin- 

OPEN 
OPEN 
OPEN 
.REPT 
.NLIST 
.WORD U 
.LIST 
.ENDR 

************ 

MOV J|5§-#w.5Tg 



?f of interrupts per ITERATION 
; MODULE IDENTIFICATION NDMBBR>6 
JREAO BUFFER VIRTUAL ADDRESS 
JREAD BUFFER PHYSICAL ADDRESS 

;read buffer ea bits 

; write buffer ea pits 
jwrite 

;WRITE. 



ADDRESS 



ISIHfjSffig lip lfiiif!!I£g 

;CDATA/DATCX ERROR COUNT 
;CDATA/DATCK WORD COUNT 

IRESERVED FOR FUTURE USE 
ImODULE STACK STARTS HERE. 



*** ************* ft««*ft«ft«r**ft***ft*ft«****** 



MOV 
MOV 
MOV 
MOV 
MOV 
CLR 
CLR 



BNE STR 
ENDS, BEGIN 



x624.,WDFR 

#3tTNTR 
DVIOl£DVCT 
DVCT-fiPDV 

TPY5 



6 WORDS TO HEM FROM RP 
24 WORDS TFROM MEN TO RP 
INTERRUPTS PER ITERATION 



1$: 



2S: 




J ANY SELECTED? 
?YES 

;SET UP REGISTER ADDRESS 
?CLEAR OUT COUNTERS 



OR LOAD MEDIUM 
RANCH IF NOT 



GWBUFS 
GETPA5 
MOV 
NFH 



HKU1N# KBUFVA 
RBUFSZ, RDCT 
RRCt 



;TEST 

JBRANL.. _. 

ILOAD DEVICE NUMBER 

;YES, DROP IT 

>N0, SHIFT TO NEXT DEVICE 

JCHECK AGAIN 

; CLEAR LOAD DEVICE 

>G0 CALCULATE IT ALL 



FROM 16-BIT RBUPVA 



RPAM DEC/Xll SY 
XRPAMO.Pll i 



00460' 
00476' 

ml- 



STEM EXERCISER MODULE 
2-0CT-78 12:12 



016767 
-5467 



mm 

016777 
105777 



001606 
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25: 



MOV 

NEG 

JSR 

JSR 

MOV 

TSTB 

BHI 

JSR 



WBOFSZ/WRDCT 

HRDCT 

R5, CLEAR 

R5#RPSEL 

MDCIIT,?CSR 

SCSR 
MHO 
R5,WAIT 



;CLB|R TR¥ CI 
160 DETERMINI 



;SET DE?ICE HO, 
jDEflCE READY? 
IIF READY HOME READ 



SEQ 0006 



)0522' 
<053a' 
)0532' 

5C546' 
)0554' 



032767 000010 004113 
7252 



mi 

10 4400 



1^- 



;HOHE HEADS ROUTINE 

; . 

HMHDI 



BIT 
BNE 
MOV 
MOV 
MOVB 
BIS 

EXITS, BE 



VECTOR, RO 
l|HSRVgfR0)-5- 

|i|lJicSR 



;have heads been homed? 

?YES 

?set vector 

jset br level 
;home heads 

JBXIT fO M0MIT0R« MODOLS Mllf FOR IIfER80Pf» 



iim: imi 

0720 



It- 

000572' 

mm- 

000622' 



5067 
12767 
00704 



004034 
003017 

mm 

mi 002746 



is: 



TST 

BR 

BIS 

MOV 

CLR 

MOV 

BR 



pVCT 

mScnt+1 

RPpNO 
#10,SWIT 
RPDV,DVCT 
MpCNT 

filirDROP 

RPDNO 



lANY MORE DRIVES? 
?G0 DO STUFF 



; START DATA TRANSFER 
I 



000624 



mm 

000646 
000652 

mm 



000672 
000676 



04567 001566 



004567 
004567 

mm 



000024 



Soil? 

8oi6? oU\li 





BMI 
JSR 


rI,waiti 


is: 


JSR 
JSR 
JSR 
CLR 


R5,BLKN0 
R5,TRKN0 
RSSCALC 
DATCK 


GOA: 


JSR 
BR 


R5,WRT 

retry! 


GOB: 


W 


R5£WCK 
RETRY2 


GOC: 


JSR 
JMP 


R5,RDCMD 
RETRY3 



?TEST FOR UNIT READY 

;go 



fQO DETERMINE BLOCK H0« 
}G0 DETERMINE TRACK HO. 
JCALCULATE. BLOCK COHfERSIOH 
?CLBAR KNOWN BAD SPOT FLAG 

I DO A WRITE 
;TR¥ AGAIN 



?D0 A READ 
?TR¥ AGAIN 



RPAM DEC/ 
XRPAMO.Pl 



Xll SYSTEM EXERCISER MODULE 
1 12-0CT-78 12:12 



MACYll 30A(1052) 12-0CT-78 17:01 PAGE B 



m 

293 
296 

1 
III 



000702' 000167 000500 



mr- 

00722' 
00730' 

mr- 

00746' 
00754' 

mr- 

00776' 
01004' 



mi] 

116777 
042777 

016777 
000417 



mil 

CC3666 
177172 

0Q3664 
000060 

mm 

177132 



mm 

002572 
002564 

mm 



MOVB 

BIC 

BIS 

MOV 

MOV 

BR 

MOVB 
BIC 

m 

MOV 
BR 



WBUFEA^aCSR 
WRDCT,6¥DC 
WPUFPA,faBAD 
GOl 

WRTCK-ftCSR 
#60,flCSR 

HBOFPA/0BAD 
GOl 



SEQ 0007 



jkLL DONE 

SSET WRITE COMMAND 
SCLEAR EA BITS 

?SET WORD COUNT 
ISET BUFFER ADDRESS 

?SET WRITE CHECK 
ICLEAR EA BITS 

?SET WORD COUNT 



i 



m 
III 



333 
334 

m 

337 

m 
m 
m 

344 
345 
346 



116777 , 

319 ■901914' 042777 000060 002524 

Ml ?8 |r. gp??? \mi mm 

313 001036' 016777 002554 002504 

i 



mr- 

01054' 

i\m 

01100' 
01106' 



16777 

mm 

116710 
016777 

mm 

052777 
10 44C0 



003622 
000060 



001112' 

001112' 000004 
120' 



Silif' 



042777 
000167 



001132' 
001132' 
001140' 



002532 
"*252- 



000004' 
00 4567 



mm- 

176732 
002526 

mm 



MOVB 
BIC 



MOV 
MOVB 
MOV 



READ,|iCSR 

#60,|CSR 

RBUFEArgCSR 

PPIBijfRO). 
BR1,(R05 

aOSAD 
" iCYAD 



TRK1,«D 

_ _ ml'' 

BIS #101,»CSR 
EXITS, BEGIN 



;SET READ COMMAND 
JCLEAR EA BITS 



>SET VECTOR 

?SET BR LEVEL 
SSET TRACK ADDRESS 

;SET GO ♦ INTERRUPT ENABLE 

?EXIT TO MONITOR- MODULE WAIT FOR IMTBRROPT, 



;H0MED HEAD INTERRUPT SERVICE ROUTINE 

J 

HHSRV: 

000000- 001120' |lR0S/BEGIN7li ;"QOEui"uP*To"cONTlNUE"lT'Ii"AMD RTl" 

000115 002420 1$: lic illiJacSR IcLEAR'ioMi'HiADs'BiTS " 

177426 JMP RTRN ;RETURN 

;DATA TRANSFER SERVICE ROUTINE 

f 

rpsub: 

000000' 001140' ^iiiirBEGTNjis ?"qoeue"uFto"contihue~at'I$"ahd rtI" 

000740 IS: JsR R5,BRCK ;Go"cHECK~FOr"eRRORS 



) 



f 



J 



RPAM DEC/Xll SYSTEM EXE 
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g urn imi 



RCISBR MODULE 
12S12 
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m 
m 

359 
360 

¥A 

363 
364 
365 



m 

397 
398 
399 

i 



001152' 

001156; 

001164' 
001172' 

001200- 

11206' 



>5767 

WW 



m 

374 

m 
k 

|73 



mr- 

1222' 
32- 



-,4403 
012767 



2 6767 
21460 

M 



o8iSJ8' 003126' 

OOCOOl 176706 

000000' 000000 

002374 002360 



i mnv- mm """^^ 

II mil- 



632 

000000' 000000 
002320 002306 



mm 



003336 



001254' 104406 
001262' 026767 

mw mii 

001276- 000167 

88118?: hum 
llllW ME 

001330' 104406 
001336- 026767 

mm- mm 

001356' 104405 

nmr- mm nmr mur 

001400' 001014 



SEQ 0008 



RTS 
TST 
RTS 



TERRORS 
;N0 ERRORS 



? RETRY ROUTINES 
, 



IWAS IT A HARD ERROR? 
ISKIP MSG IF YES 



TSTB HDERF 

BWE IS _ _ 

iligNS,BEi?«"Sgl ..sen «^likfeE'?IgL''§fTg''M5H^Simg'' 
MOV fi*ERRTYP ---- 



1$: 



IDATA ERROR 

»**«■* ********* j|;AAft«r««>««ft«««ftftljtr«ar«ft«ft 

^SSISSiSISIfiiPt'-^^ iWRITE ERROR 

I ***********%*********»* Sr**************************** 

CMP RTLMT,TRY1 

BEQ COM lYES 

INC TRYl 

JMP GOA 



ILIMIT MET? 



*********** 



;RETRY 3 TIMES 



;WAS IT A HARD ERR? 
?SKIP MSG IF YES 



is: 



TSTB HDERF 
BNE 1$ 
JSR PC, NOW 

f8iiiiJiiiiidEL!r****ii§iii*oiSLi§i8i* 

CMP RTLMT,TRY2 
BEQ COM 

TR|2 ; RETRY 3 TIMES 



>PyT INTO MSG CURRENT POSITII 
MESSAGE CALL WITH COMMON HEADI 
/r.rKiir >DATA ERRP*^ 

*********************** 



SSAGE CALL 
DATA ERROR 

-ft******************************* 



********************** 



ILIHIT MET? 



HDERF 
IS 



;WAS IT A HARD ERR? 
;SKIP MSG IF YES 



********************** **j^**************«*4t««************** 



000000' 000000 

002244 002234 

002226 
177314 

000000- 000000 



TSTB 
BNE 

r 

Ml 

f8Slii«il!?iI«SI?lli*******iillS*liigS ****************************** 

CMP RTLMT,TRY3 ;LIMIT MET? 

BEQ COM 

INC TRY3 

JMP GOC 

************************************** 



^ - ^ ^ ^ ~ n ^ ^ n m n n n n tt •% K K K m m It Jt xwxx If K-K VUltlfBlMVlf 

km%timMm,» — iiss.xisi.sjKii?...... 



***************** 

^SGNS,BEGIN,MG8 ; ASCII MESSAGE CALL WITH COMMON HEADER 
BIT #2#|r1 ;IS DROP SWITCH ON? 

RNF RF.STPT 



RPAM DEC/Xll 
XRPAMO.Pll 



SYSTEM EXE 
12-0CT-78 



RCISER MODULE 
12:12 



i 
i 

i 
Sit 

ill 

420 

i 

42" 



m 

441 

m 

444 

i 

m 
m 
111 

456 
457 
458 



1422' 



0M4P' lilifl 

001422; 001424' 
001424' 104413 
001430' 000400 



m mir-nm 



m 88 

432 00 



mw EM 



m 



001512' 000167 
005067 



001516' 

§8111^: 

mw imii 
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001402' 00 4567 001224 



003236 

000000' 000126' 



001432' 905767 003162 
176760 



003136 



001544' 022767 
001552' 001405 

052767 
000167 
005067 
572' 000167 



001554 
001562 



0^J566: 005067 



000020 003060 
176646 



SEQ 0009 



000023 002111 

000040 003130 
176716 

002070 

000001 176266 



007726 002054 





JSR 


RS^OFFEND 


;G0 DROP 


ALDN: 

IS! 


TST 
BNE 

CDATAS/ 

.♦2 


DATCK 

BEGIN^RBUFPA 


}IS THIS A KNOWN BAD TRACK? 

J SKIP THE CHECK DATA IF YES 

} REQUEST FOR MONITOR TO CHECK DATA 

; IF ERROR, CONTINUE 


ENDITS/ 

BR 


BEGIN 
RESTRT 


? SIGNAL END OF ITERATION. 
;MONITOR SHALL TEST END OF PASS 


;CONTINUE AFTER 


TRANSFERING 


4 BLOCKS OF DATA 


restrt: 


TST 
BEQ 
INCB 

asl 

JMP 


DVCT 

TRCT 

MDCNT*1 

DROP 

RPDNO 


?TEST FOR MORE DRIVES 




;INCREMENT DRIVE COUNT 
;M0VE drop POINTER 
;G0 DO ANOTHER DRIVE 


TRCT: 


MOV 
CMPB 

m 

JMP 


«1,DR0P 

#40^SWIT 

RPDNO 


;RESTORE DROP POINTER 
SALL TRACK TESTED? 

w 


blct: 


CLR 
BIT 

BEQ 


TRKl 
||/SR1 


;CLEAR TRACK COUNTER 

;TEST FOR HIGH OR LOW DENSITY 



JHIGH DENSITY 



CMP 
BLE 
BR 

;LOW DENSITY 
5 



urn- 



;no 



003750 002042 IS: 



2S: 

RESTR; 



CMP 
BEQ 

BIS 
JMP 
CLR 
JMP 



#2024.,BLK1 
RESTR 



IpdIio** 



;LOW DENSITY LIMIT MET? 

;yes 

?N0 
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?REGISTER SET-UP SUBROUTINE 
, 



001576- 01670C 



mu 

01610 



001640' 
r'Q1 644' 

mm- 

001654' 
001672' 



mm 

010067 

mil 

01006^ 

lit 

010067 
005020 

mm 

02202 




OL 

000205 



56 176206 



MOV 

m 

MOV 

CLR 
MOV 
CLR 
MOV 
CLR 
MOV 
CLR 
MOV 
CLR 
CMP 
TST 
MOV 
MOV 
RTS 



&DDR,R0 
RO^ERG 



AD 

YAD 
♦ 

SAD 

+,(R0)+ 



SRA 



;hove address to ro and 
?start to set op regs. 
; device status reg. 

i set error reg 

^control status reg 
;increment address 

?lfORD COUNT REG. 
;BUS ADDRESS REG*. 

;cylinder address reg. 
;disk address reg. 



?SAVE CSR address 



?device select subroutine 



nil-: 



mm 

001714' 000205 



002720 

mm 



asr 


y,CT 


BCS 


INCB 


mdcnt-h 






mil 


RTS 


R5 



;look for active device 



;RESET THE RP 
J 



1716' 
1724' 
1732' 
1736' 



mm 

000466 



mm 



MOVB 
MOV 
JSR 
RTS 



SoCST/gCSR 
R5/WAIT1 



J SET idle command 

;reset drive # after idle 
;go wait for dhit ready 



m 



;SET rlock number 
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mm- mm 



000020 002674 



001750' 000205 

001752' 042767 

001760' 062767 

001766' 000205 



mm 
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pO/SyiT 



mu 



BLKMO! bit 
BNE 

RTS R5 

IS: BTC #50,SWIT ;CLEAR FLAG. 

ADD #4^PLK1 ^INCREMENT BLOCK COUNT 

RTS R5 



|h|h block flag set? 
;no 



J SET TRACK NUMBER 



mm mm '''''' 

002000' 000205 

mw Mil ^^'^^^ 



TRKNO: BIT »40/SWIT 

BNE 1$ 

RTS R5 

is: flC_ |40jSfIT 



JDO NEW TRACK FLAG SET? 
;VES 

;no 

;CLEAR FLAG 

; INCREMENT TRACK. 



^CALCULATE CYLINDER AND SECTOR 



002026 

020 4C 
002042 
0Q2O46 
002050 
002054 



nm 

016702 

MM 

110267 



mm 

001562 
000011 



002562 
001536 



is: 



CALC: cp 

MOV 
CMP 
BGE 
ADD 
INC 

DIV: MOVB 
RTS 



K1A2 ;SET BLOCK 



cy; 

BLm« K. 

!!?»'' 

r1,R2 
ntCNT 

R2,TRK1 

R5 



NDER COON? 



NO. 
CULATION. 



jstart ca|c 

for divide 
;keep count. 

j set sector address 



JCLEAR ROUTINE 



mm- mw 
nmr- mvi 

002076' 005067 
002102' O0C2C5 



mm 
mm 



cCfe 

CLR 
CLR 
CLR 
RTS 



TRY 

TRYl 

TRY2 

tryS 

TRY4 

R5 



;ERROR CHECK ROUTINE 



RPAM DEC/Xlt SY 
XPPAMO.Pll i 



!TEM_EXEPC|S|R MODULE 
001436 
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ERCK! 

is: 
2S: 



3$: 



11: 



001224 



7S: 
BS: 



SEQ 0012 



TST 



******* 



RTS 

BIT piT4,$ERG 
BEO 3S 
INC DLTCNT 
MOV f2,ERRW 
I **************** j 

S0FER5,FEGIN,NULL 

j*****ft ***«****««*»«*« 4 



?N0 ERROR 

?TIWING ERROR? 
?N6 



******************* 



*********************** 



m 

CLRB 



MOV 
CMP 
BEQ 
CMP 
BNE 
MOV 

Jr"= 

MOV 

KSI! 

MOV 
BIT 
BEQ 
JSP 



pJdloc.ri 

|Rl)/n77?77 
c8r^(R1)+ 

(R6)*,R1 

DJTCK 
%^ 

(R6)+#R1 



JCOMT 

fiil^TRicir INFO 
ILEAVE ONLY TRACK BITS 
fMOVE TRACK BITS OVER 1 PLACE 

ADDR OF DISK 
?6ET START OF TABLE OF RNOHN BAD 



?GET 

JEND OF TABLE? 



RNOHN BAD SPOTS 



Idvs;astat 

|40060,QCSR 

UDK PC, NOW 

MSGNS/BEGTN,MG7 | ASCII 
CLP ERRTYP 
. ********************* 

yisiiidisiSftiiiis**** 

INCB 
JSP 
BIT 
BEQ 

JSR R5/0VFL0 

RTS R5 



>is TRis-xDSin 8!!§SH''i,8''l!!ol?"™ 

'rEs¥o6e^rI "^^^^^ ENTRY 

isl| ?hI KNONH BAD SPOT FLAG FOR ALDN 
7RETURN AND DO NOT REPORT THE ERROR 
IRESTORE Rl 

?S||^|g FOR ERROR CALLS 

} DITTO 
JHARD ERROR? 

JPUT INTO MSG CURRENT POSITION 
ESSAGE CALL WITH COMMON HEADER 

3UNKN0WN ERROR 
************* *************************** 

**£**************************« 



MESSAGE CALL WITH COMMON HEADER 



HDERF 

R5,REST 

«2,AERG 



************** 
>SET HARD ERR FLAG TO GATE LATER MSG 
PRESET AND TRY AGAIN 

?CHEC?r FOR OVERFLOW SET 



;WAIT FOR CONTROLLER READY 
J 



BREAKS#BEGIN 
BREAKS^BEGIN 
JSTB 



^TEMPORARY RETURN TO MONITOR.... 
JTHEN CONTINUE AT NEXT INSTRUCTION. 

fcgNTROLLER READY? 



RPAM DEC/Xll SY 
XRPAWIO.PII 1 



STEM EXERCISER MO 
2-OCT-78 12:12 
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175514 

mm- 

175476 
000000 



INC TMCNT ;N0 

ggl ?TIME OUT 

M§?N$/BE6_^ ^ ^ ^ 

MOV #3^6rrty^ jcontrolCer not ready 

******«*******»************♦»«,>«**»«»**<>»#**» j^fti^^j^jSft^ljj^ftj^^^ft^jj^ 

y52S§lc85£n«5m****.**i5gnmiSS*«8I*8im*********** 

JSR R5, OFFEND 

RTS R5 



SR,ACSR 
#3^fRRTYP 



sen MESSAGE_C^LL NITH_COMMON HEADER 



«*«*****«« 



JWAIT FOR UNIT REIlDY 
; 



WAITl: 

1$: 



175414 

003154' 

175402 



CLR 

BREAK! 
TST 
BMI 
INC 
PNE 
MOV 
MOV 



EGIN 
EGIN 
8DVS 

fwCNT 



?YES 
I NO 

?TIME OUT 

ftCSR, ACSR 
p.u» |DVS,ASTAT 

MSGN$,BEGIN,MG5 JASCII MESSAGE CALL WITH COMMON HEADER 

ra*****fS*S85ne*******i2inSS*58I*2S48)(** 

HPDERS, BEGIN, NULL JUNIT NOT READY 

. ***********%************************«*. 

R5, OFFEND 



JSP 
RTS 



**ftftftft*ft»**ftftftfttt*ftft« 
**ft****ft***«***ft«**«ft**ftft« 



R5 



JOVERFLOW POUNTINE 
J 



OVFLO: MOV 



is: 

DET: 



MOV 

SUB 

BR 

MOV 

SUB 

m 

MOV 
CLR 



aSUCA,R3 



R4,Q 



?ARE WE PAST 405? 
I SET COUNTER 



RPAM DEC/yll syj 

xRPAMO.pii i: 



TSM EXERCISER MODULE 
-OCT-78 12:12 
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m 
III 



iilloo' 

002602' 



mm 
mm 



mm 

175334 



mm mil '^^^^^ 



000772 1$: 



000756 



TEL: 
RET: 



BLQS 

CMP 

TST 

BIC 

JMP 

RTS 



WBUFSZ,TET 

RET 

|p,SWIT 



SEQ 0014 



Mi |J|60.,TET ;FIND SPACE LEFT 

BNE 1$ 



^COMPARE SPACE LEFT 

JRESTORE STACK 



If! 

705 

M 

709 



mill 
mi'- 



652' 
660' 



046767 
005767 

10 4403 
016767 

mm 



000000' 003160' 
001742 001732 



?OROP ROUTINE 
, 

OFFEND: BIC 
TST 



DROP,RPDV 
RPDV 



?clear offending drive 
;any more drives? 



iNi$,BEGli } 
MSGNS, begin, MG6 JASCII MESSAGE CALL MITH COMMON HEADER 

mov rpdv,dvct jrestore count 

SmI ^tr'* ;restope stac^t 

;now routine installs current address into msg 



713 

m 

ii 

720 

3I 



730 
731 



737 
738 



002674 

002676 

002702' 00Q3C1 

002704' 042701 

002710' 010167 



010146 
017701 

000 ' 



mW' mm- 



02724' 
D2732' 



0027 40' 
002746' 

umv 

002764 

iW 

003000 
0030G4 



177770 
000132 



nOOOOO' 003046' 



iWii'i milt mm 



000000' 003050* 



10442C 
003040' 

HI?!? mtti mm 

-- 000055 000504 

000560 



' 116767 00 

'■Ma 



042701 177740 
010167 000042 



MOV 
MOV 
SWAB 
BIC 
MOV 

^ ****; 



R1#-(R6) 
UCSR/Rl JGET OEV 
Rl 

#177770, PI 

Ri,NUMBSl 



OTOAS/BEGIN/NUMBAl/DNUM 



**** 
OVB 



******************* 



flC 

****** 



DNUM*5,NW+4 
-CVAD,N0MBA2 
-***V**********' 



JSAVE CURRENT Rl 
ICE # 

;GET GOOD BITS ON RIGHT SIDE 
;LEAVE ONLY CORRECT BITS 
fSTORE IT 

************************** 

yCONVERT NUMBAl TO ASCII AND 
;STORE AT DNOM 

******************************* 

?PUT IN MSG 

fPUT CVLilN NUMBA2 FOR MACRO 
ft****************************** 



********* 



******** 



OTOAS, BEGIN/ NUMBA2^DNUM 



ICONVERT NUMBA2. TO ASCII AND 
?ST 



STORE AT DNUM 



;*** 

MOVB 

MOVB 

MOVB 

MOV 

SWAP 

BIC 

MOV 



r** ***************** 

DKUM4-3/ NW+7. 
DNUM*4#NW*8. 
DNUM+5,NW*9. 
|dSAD/R1 

»177740/R1 

R1/NUMBA3 



******************* 

>PUT CYC# DIGITS 
?INTO 
IMSG 

?PUT TRACK* ON STACK 
;G5T good BITS ON RIGHT SIDE 
JLEAVE ONLY TRAVK BITS 

?SAVE 



****************** 



RPAM DEC/Xll SYSTEM EXERCISER MODULE 
XRPAMO.Pll 12-QCT-78 12:12 



w 

^53 

756 
-57 
58 
59 

6r 

6; 
.6: 

76- 
4 

i5 



I; 



i 

778 
77? 
780 
781 



786 
787 
788 
789 
790 
791 
792 
793 
794 
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003010' 
003016' 



104420 000000' 003052' 
00 30 40' 



003020' 116767 000020 000453 

%%\%\x- mVi """^'^ 

48 003036' 000207 



757 003050' 00 

758 003052' 00 
759 





Ol 
000 
000 



3054' 
3056' 



m 

3066' 

m 



00 

oa 
on 
00 

003116' 
003124' 



lilf: 



urn- 
mix- 



77777 
77777 

m 

77777 

77777 

m\ 

77777 
mn 
mil 
mn 
mil 



003176* 



************************************************************** 

^CONVERT NUMBA3 TO ASCII AND 
; ST ORE AT DNUM 
OTOAS/ BEGIN, NUMB A3 /DNUM 

• ************************************************************** 
MOVB DNUM+4/NW+12. ;PUT TRACKf DIGITS 

Move DNUN+i^Nw+fg. Unto hsg 

(P6)*/R1 ;REST 



MOV 
RTS 



PC 



DNUM: .BLKW 3. 

NUMBAl: .WORD 

NUMBA2: .WORD 

NUMBA3: .WORD 



BADLOC: 



177777 
177777 



177777 

mm 

mm 

nmi 

JGODD THINGS TO SAVE. 
HEl 

fl7777 



JRESTORE Rl 
JGO BACK 



; RESERVE SIX BYTES FOR BTDD MACRO 



JTABLE FOR ENTRY OF KNOWN BAD 

; TRACK-CYLINDER LOCATIONS 

;FOR_ANY TRACK-CYLINDER COMglNATIONS 

»JHI»SPST OCCURANCE OF A MINOS ONE, 



?2fll„MHST BE IN THE FOLLOWING 
^PATTERNS 

;0 OTT TTT CCC CCC CCC 
;WHERE d IS UNUSED,T IS TRACK 
?C IS CYCLINDER. if IS THEREFORE 
JJUST /IN OCTAL/0 TT CCC. THE LAST 

?THIS MEANS THERE IS ROOM FOR 20 ENTRIES 



RPAM DEC/Xll SYSTEM EXERCISER MODULE 
XRPAMO.Pll 12-OCT-78 12:12 

003140' 177777 
799 003146' 177777 
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i 



003150' 003277' 
003152' 177777 

003154' 003324' 
003156' 177777 

003164' 003404' 
003166' 003465' 
003170' 177777 

mm- mm' 
ililliiil 



m 
i 

844 

III 



MG41 
MG5: 



05111 



m i\m mil imi 



mm- mm 



003254 

8" 




00 

. .20045 047523 

ill mi hmi 



051122 051117 



lur-odn mm mm 
mr-lMi mil """^ 

mi'-mm um mm 

3340' 040505 054504 022440 



003346' 



000 



ill m tdi im imi 



mm 

HE3 

177777 



DNR 

mm 
up 

177777 



177777 

HRD 
NV 

mm 



mm 

.ASCIZ 



'% SOFT WRITE ERROR 



.ASCIZ '% SOFT WRITE CHECK ERROR 



•* SOFT READ ERROR 



'% DEVICE NOT READY 1' 



'« UNIT NOT READY %' 



'% DROPPED OFFENDING DRIVE %' 



RPAM DEC/Xll 
XRPAMO.Pll 



II 

ill 
ill 



Iff 
i 

III 



m 

895 

i 



003370' 
003376' 



SYSTEM EXE 
12-0CT-78 



2^2516 
042526 



003420' 04104) 

mm- ^'Hl 



RCISBR MODULE 

12:12 

042040 044522 
020040 000045 

mm mm 
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.ASCIZ '* HARD ERROR BIT 14 SET ' 



003435' 



QQ3 



imp.' mn 

mm- ur " 



041lli 



003532' 



003540 

nmz 



051122 



urn im 



m 

901 



83562 
3564 



003606 

mm 

iim 



mi 



000002 

mm 



SEQ 0017 



045 052440 051116 SOfi: 



MBSIO: 

.EVEN 



DLTCNT: 

savrg: 

ERGS 
CSR: 

HOC: 
BAD: 
CYAOS 

dsad: 



SUCA: 

QHT? 

TRY? 
TRYl: 

mil 

RTLHTS 



'% UNRECOVERABLE ERROR %' 



.ASCIZ 'fDATA LATE ERROR*' 



177777 



.BLKH 256. 



ICONTROL STATUS RB6 
IMORD COUNT REG 
?BUS ADDRESS REG. 



^SELECTED UNIT CYLINDER ADDRESS 



iRETRf LIMIT **^*********»*CA!I BE CHANGED 

ITRACK NO. 

}READ NORD COUNT 
;RBAD BUFFER 



RPAM DEC/Xll SYSTEM EXERCISER MODULE 
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II mm iim 

004640' 000000 
004642' 000000 

mm' mm 

004650' 000000 
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DVCT: 

WRDCT: 

TMCNT! 

RPDV: 

cylcht: 

miv 

HRTCK: 

LR! 

SWIT! 



hderf: 

CUR: 

datck: 



;OEYiCE count 

yWORD COUNT FOR WRITE 

TTtWr OUT CfrtfffT 



;WRITI 



E COMMAND 

COMMAND 
E CHECK COMMAND 



SPLAG SWITC 
feiT 3=1' 

;bit 4=1 



>HEADS HAVE BEEN HOMED 
>NEH BLOCK REQUESTED 
gJNCgJgENT TRACK COUNT 



scurrent disk cyl and TRK APDR 

;FLAG SET BY ERCK WHEN FINDS KNOWN BAD 



000001 



RPAM OEC/Xll 
XRPAMO.Pll 



SYSTEM EXERCISER MODULE 
12-0CT-78 12:12 



OQ0102R 

Mill 



000001 

000002 



MACYll 30A(105: 

CROSS REFERENCf 



599* 
465 

409# 

600* 

305* 

w 
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629* 


654* 




630* 


655* 




312* 


475* 


885t 


228 




232 


III 


i 


m 



III m m m m 



mi 

BIT7 

m 

BLCT 
BLKNO 



BR 



AKS= 



mm 
mm 

000200 

mm 

001516R 
0Q1740R 
0C3614R 
194407 



COM 

CONFIG 
CSR 



539f 
411 



452 


519* 
648 


541 
649 


90 4# 




393 


396t 








253* 
484 


294* 
504* 


295* 
505* 


m' nr w 


liv 181* iw nv m' 


598* 

IW 

545* 
595* 


725 

911| 

9228 


886* 







679# 



RPSM DEC/XU 



SYSTEM KITE PCI SER 
12-OCT-78 12:12 



IMODX. 

imt 



Hi 

004620R 

mm 

%- 104413 

003544R 

IIP 

06l6R 
>0664R 

Hi 

OQ0044R 

m 

000030R 

Willi 

003516R 



2$= 
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m 
pi 

lit. 

575 

m 

m 



232 

mt 

239 

ill 

m 

197ff 
359 



600 

228 

611 
374* 

322 



315« 
370 



260* 



373 



732 
4||* 

f3C 

703 

8B2t 
388* 



384 



634 



387 



603 



733 


734 


742 


745 


746 


755S 


495* 


700 


894« 








887t 
258 


263* 


424 


430* 


492* 


706* 


650 


655 


8«1# 








578* 


605* 


632* 


657* 







907« 



920* 



426* 



431* 



505 



902f 



400 



713S 



656 




RPAM DEC/Xll 
XRPAMO.Pll 



SYSTEM_EXERJ|SER MODULE 



SgFER$= 
SOFPAS 
SPOINT 
SPSIZ = 



HASADR 

UBtlFEA 

mvfpk 

III 

liD|R 

Ml 



mm 

104406 
OQ0046R 
000032R 

imt 

000016R 



§VR6 
SKIT 

SySCNT 



004624R 
001454R 

IMf 

003572R 

00360QR 
003602R 

fioOOlOR 

mi 

0104R 
0136R 

in 

004632R 



m 

21 * 

IP 

20 4# 



621* 
425 

364 
378 

§62* 

isr 

137# 

m 

171« 



187 

188.. 

297* 

m 

294 



861fl 
362 



199» 
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672 



Wl ihr m* 

161| 

lesl 

Hp 24 



627* 
430$ 



895f 

nn 

394* 
899f 

m 

250 

m* 
m 

iU* 

236* 
912# 



262* 

m* 

646* 
433 



iil* 

561* 



315 
646# 

m 

686 
313* 

297 



m 

898} 



909# 
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